home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
201-225
/
disk_203
/
gurusguide
/
intrmon.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
5KB
|
162 lines
/************************************************************************
********** **********
********** I N T E R R U P T M O N I T O R **********
********** --------------------------------- **********
********** **********
********** Copyright (C) 1988 Sassenrath Research **********
********** All Rights Reserved. **********
********** **********
********** Example from the "Guru's Guide, Meditation #1" **********
********** **********
*************************************************************************
** **
** - NOTICE - **
** **
** The "Guru's Guide, Meditation #1" contains detailed information **
** about Amiga interrupts as well as a complete discussion of this **
** and other examples. Meditation #1 and all of its examples were **
** written by Carl Sassenrath, the architect of Amiga's multitasking **
** operating system. Copies of the "Guru's Guide" may be obtained **
** from: **
** GURU'S GUIDE, P.O. BOX 1510, UKIAH, CA 95482 **
** **
** Please include a check for $14.95, plus $1.50 shipping ($4.00 if **
** outside North America). CA residents add 6% sales tax. **
** **
** This example may be used for any purposes, commercial, personal, **
** public, and private, so long as ALL of the above text, copyright, **
** mailing address, and this notice are retained in their entirety. **
** **
** THIS EXAMPLE IS PROVIDED WITHOUT WARRANTY OF ANY KIND. **
** **
************************************************************************/
/*
** IMPORTANT WARNING:
**
** This program DOES NOT protect against state changes while
** accessing system structures. It may in some cases produce
** unreliable results. This example was produced for demonstration
** and debugging purposes only, and it should be used with care.
*/
/*
** COMPILATION NOTE:
**
** Compiled under MANX AZTEC C 3.6A. Use the +L compiler option
** and the "c32" library.
*/
#include <exec/exec.h>
#include <exec/execbase.h>
#include <hardware/custom.h>
#define REG register
#define FIRST(n) (struct Interrupt *)((n)->lh_Head)
#define EMPTY(n) ((n)->lh_Head == &n->lh_Tail)
#define NEXTINT(i) (struct Interrupt *)((i)->is_Node.ln_Succ)
#define LAST(i) (((i)->is_Node.ln_Succ)->ln_Succ == 0)
struct ExecBase *EB;
char *IntrName[] =
{
"TBE", "DISKBLK", "SOFTINT", "PORTS",
"COPER", "VERTB", "BLIT", "AUD0",
"AUD1", "AUD2", "AUD3", "RBF",
"DSKSYNC", "EXTER", "INTEN", "NMI"
};
char IntrPri[] = {1,1,1,2,3,3,3,4,4,4,4,5,5,6,6,7};
main()
{
extern VOID *OpenLibrary();
puts("Guru's Guide Interrupt Table Printer\n");
EB = OpenLibrary("exec.library", 0);
if (EB == NULL) exit(100);
PrintAllIntr();
}
char *GetNodeName(node)
REG struct Node *node;
{
if (node == NULL) return "";
if (node->ln_Name == NULL) return "(missing)";
else return node->ln_Name;
}
int GetNodePri(node)
struct Node *node;
{
if (node == NULL) return 0;
return node->ln_Pri;
}
PrintAllIntr()
{
REG int i;
REG struct IntVector *iv = &EB->IntVects[0];
APTR sc = (APTR) EB->IntVects[3].iv_Code;
puts("IV E INTR P S CODE DATA NPR NAME");
puts("-- - ------- - - -------- -------- --- -----------------");
for (i = 0; i < 16; i++, iv++)
{
printf("%2d %c %-7s %d ", i,
(custom.intenar & (1 << i)) ? '*' : ' ',
IntrName[i],
IntrPri[i]);
if (iv->iv_Code == sc)
{
PrintServers(iv->iv_Data);
} else if (iv->iv_Code != 0)
{
printf(" %08lx %08lx %s\n",
iv->iv_Code,
iv->iv_Data,
GetNodeName(iv->iv_Node));
} else putchar('\n');
}
}
PrintServers(slist)
struct List *slist;
{
REG struct Interrupt *s;
if (EMPTY(slist))
{
puts("*");
return;
}
for (s = FIRST(slist); NEXTINT(s) != 0; s = NEXTINT(s))
{
printf("* %08lx %08lx%4d %s\n",
s->is_Code,
s->is_Data,
GetNodePri(s),
GetNodeName(s));
if (!LAST(s)) printf(" ");
}
}